home *** CD-ROM | disk | FTP | other *** search
/ PC World 2000 February / PCWorld_2000-02_cd.bin / Software / Vyzkuste / xsetup / _SETUP.2 / Group3 / XQ FileCache Settings.xpl < prev    next >
Text File  |  1999-08-27  |  2KB  |  63 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 5.0"
  2. "TYPE"="2"
  3. "COUNT"="2"
  4. "UIPATH"="System\File System\Options"
  5. "NAME"="Windows 9x File Cache"
  6. "VERSION"="1.41"
  7. "LANGUAGE"="VBScript"
  8. "TEXT 1"="Min. Cache (K)"
  9. "TEXT 2"="Max. Cache (K)"
  10. "DESCRIPTION 1"="If you want to control Windows how much RAM it should use for the file cache, enter the desired values here."
  11. "DESCRIPTION 2"=" "
  12. "DESCRIPTION 3"="It seems to have better results with the maximum cache size set to one eigth [1/8] of the total RAM memory installed in the system.  This way it gives the cache plenty of memory to use and doesn't take too much away from the operating system."
  13. "DESCRIPTION 4"="For example, if you have 128 MB of RAM, a max cache of 16 MB and a minimum cache of 8 MB would be a good choice."
  14. "DESCRIPTION 5"="Another tip: Try setting the minimum and maximum sizes close together if you use many large, disk access intensive applications like a lot of the application suites that are available. This can improve their performance considerably."
  15. "AUTHOR"="Xteq Systems"
  16. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  17. "COMMENT 1"="For more information, go to http://www.xteq.com or write to TeXHeX@xteq.com."
  18. "COMMENT 2"="Thanks to AXCEL216 for this great plug."
  19.  
  20.  
  21. sf="SYSTEM.INI"
  22. ss="vCache"
  23. v1="MinFileCache"
  24. v2="MaxFileCache"
  25. Sub Plugin_Initialize 
  26.  if GetWinVer=2 or GetWinVer=4 then
  27.   Disable 
  28.  else
  29.   i=IniReadValue(sf,ss,v1)
  30.   SetUIElement 1,i
  31.  
  32.   i=IniReadValue(sf,ss,v2)
  33.   SetUIElement 2,i
  34.  end if
  35. End Sub
  36.  
  37. Sub Plugin_CheckData(ElementIndex)
  38. End Sub
  39.  
  40. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  41.  i=GetUIElement(1)
  42.  if len(i)=0 then
  43.   Call IniWriteValue(sf,ss,v1,"")
  44.  else
  45.   Call IniWriteValue(sf,ss,v1,i)
  46.  end if
  47.  
  48.  i=GetUIElement(2)
  49.  if len(i)=0 then
  50.   Call IniWriteValue(sf,ss,v2,"")
  51.  else
  52.   Call IniWriteValue(sf,ss,v2,i)
  53.  end if
  54.  
  55.  Restart
  56. End Sub
  57.  
  58. Sub Plugin_Terminate 
  59. End Sub
  60.  
  61.  
  62.  
  63.